Class Class

>> string

  | m res |

  m <- self methods.

  m do: [:md|

    (md name = string)

      ifTrue: [res <- md]].

  ^ res